Cell Plate 전류산포 운전 표준수립

rm(list=ls())
knitr::opts_chunk$set(echo = TRUE)

#packages <- c("knitr", "stats", "dplyr","rmarkdown","tibble", "data.table","tidyr", "ggridges", "ggplot2", "anytime", "stringr", "patchwork")
#packages
 packages <- c("tidyr","tidyverse","dplyr", "knitr", "rmarkdown","anytime")

#install.packages(packages, dependencies = TRUE)
if(!require(rmdformats)) install.packages('rmdformats'); require(rmdformats)
if(!require(gridExtra)) install.packages('gridExtra'); require(gridExtra)
 #install.packages('rmdformats')

invisible(lapply(packages, library, character.only = TRUE))

#directory - R_code
print(dirname(rstudioapi::getActiveDocumentContext()$path))
setwd(dirname(rstudioapi::getActiveDocumentContext()$path))

source("./Plot_lib.R")
source("./R_function.R")

return_CName_chr<-function(df1, Tag){
    for (i in 1:NCOL(df1)){
        if (df1[i]==Tag){
            return(names(df1)[i])
        }
    }
}


## Global options
options(max.print="75")
opts_chunk$set(echo=FALSE,
                 cache=TRUE,
               prompt=FALSE,
               tidy=TRUE,
               comment=NA,
               message=FALSE,
               warning=FALSE)
opts_knit$set(width=75)

getwd()

1.Data_Load

1-1.연소이력&Tag Data

[1] "D:/NF3연소 사전감지 과제/4.Cell Plate 운전표준수립/YU_JISU/0.Data"

1-2.연소 분Data

[1] "D:/NF3연소 사전감지 과제/4.Cell Plate 운전표준수립/YU_JISU/2.RSC"
[1] "D:/NF3연소 사전감지 과제/4.Cell Plate 운전표준수립/YU_JISU/2.RSC"
 [1] "N-3_RG-110E"  "N-3_RG-110H"  "N-3_RG-110Q"  "N-3_RG-110S"  "N-3_RG-110U" 
 [6] "N-3_RG-110Y"  "N-3_RH-110AB" "N-3_RH-110R"  "N-3_RI-110A"  "N-3_RI-110AA"
[11] "N-3_RI-110AC" "N-3_RI-110C"  "N-3_RI-110D"  "N-3_RI-110H"  "N-3_RI-110M" 
[16] "N-3_RI-110N"  "N-3_RI-110Q"  "N-3_RI-110U"  "N-3_RJ-110E"  "N-3_RJ-110F" 
[21] "N-3_RJ-110H"  "N-3_RJ-110J"  "N-3_RJ-110K"  "N-3_RJ-110M"  "N-3_RJ-110O" 
[26] "N-3_RJ-110R"  "N-3_RJ-110V"  "N-3_RJ-110W"  "N-3_RJ-110Y"

2.Preprocessing

연소 건수

G-E 의 연소 건수 1 건 
G-H 의 연소 건수 3 건 
G-Q 의 연소 건수 5 건 
G-S 의 연소 건수 3 건 
G-U 의 연소 건수 2 건 
G-Y 의 연소 건수 1 건 
H-AB 의 연소 건수 4 건 
H-R 의 연소 건수 1 건 
I-A 의 연소 건수 1 건 
I-AA 의 연소 건수 5 건 
I-AC 의 연소 건수 0 건 
I-C 의 연소 건수 1 건 
I-D 의 연소 건수 3 건 
I-H 의 연소 건수 4 건 
I-M 의 연소 건수 3 건 
I-N 의 연소 건수 5 건 
I-Q 의 연소 건수 2 건 
I-U 의 연소 건수 2 건 
J-E 의 연소 건수 1 건 
J-F 의 연소 건수 2 건 
J-H 의 연소 건수 2 건 
J-J 의 연소 건수 1 건 
J-K 의 연소 건수 4 건 
J-M 의 연소 건수 5 건 
J-O 의 연소 건수 1 건 
J-R 의 연소 건수 4 건 
J-V 의 연소 건수 10 건 
J-W 의 연소 건수 3 건 
J-Y 의 연소 건수 2 건 
[1] 81

3.탐색적 자료 분석(Exploratory data analysis)

3-1 G-E cell

G-E 의 연소 건수 1 건 
연소발생일 :  2020-05-02 0:08

3-2. G-H cell

G-H 의 연소 건수 3 건 
연소발생일 :  2020-05-25 13:20

연소발생일 :  2020-10-24 9:42

연소발생일 :  2020-12-07 0:05

3-3. G-Q cell

G-Q 의 연소 건수 5 건

3-4. G-S cell

G-S 의 연소 건수 2 건

3-5. G-U cell

G-U 의 연소 건수 2 건

3-6. G-Y cell

G-Y 의 연소 건수 1 건

3-7. H-AB cell

H-AB 의 연소 건수 4 건

3-8. H-R cell

H-R 의 연소 건수 1 건

3-9. I-A cell

I-A 의 연소 건수 1 건

3-10. I-AA cell

I-AA 의 연소 건수 5 건

3-12. I-C cell

I-C 의 연소 건수 1 건

3-13. I-D cell

I-D 의 연소 건수 3 건

3-14. I-H cell

I-H 의 연소 건수 4 건

3-15. I-M cell

I-M 의 연소 건수 3 건

3-16. I-N cell

I-N 의 연소 건수 5 건

3-17. I-Q cell

I-Q 의 연소 건수 2 건

3-18. I-U cell

I-U 의 연소 건수 2 건

3-19. J-E cell

J-E 의 연소 건수 1 건

3-20. J-F cell

J-F 의 연소 건수 2 건

3-21. J-H cell

J-H 의 연소 건수 2 건

3-22. J-J cell

3-23. J-K cell

J-K 의 연소 건수 4 건

3-24. J-M cell

J-M 의 연소 건수 5 건

3-25. J-O cell

J-O 의 연소 건수 1 건

3-26. J-R cell

J-R 의 연소 건수 4 건

3-27. J-V cell

J-V 의 연소 건수 10 건

3-28. J-W cell

J-W 의 연소 건수 3 건

3-29. J-Y cell

J-Y 의 연소 건수 2 건